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The 6502 microprocessor has been 
with us for a good few years now; 
reputable computers using the 6502 
include the first 'Personal Computers', 
the PET and the Apple II, and more 
recently the Oric, VIC-20 and the BBC 
Micro. 

This fine old workhorse sometimes 
looks a little jaded compared to some of 
the more recent developments such as 
the 68000 and even the 6809 and could 
do with something of a 'facelift'. 

Rockwell International, one of the 
manufacturers of the 6502, has recog- 
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nised the need for a 6502 facelift and 
produced a new, pin-compatible, in- 
struction-compatible 6502 processor. 

The R65C02, as it is called, is manu- 
factured in CMOS technology which 
gives it some distinct advantages over 
NMOS: 

(1) Power consumption at 1MHz is 
only 20mw compared with the NMOS 
consumption of 450mw. This will also 
allow battery-run computers to be 
designed using the new CMOS 
peripheral chips. 

(2) CMOS also has a far bettertolerance 



Description 

Add memory to accumulator with 
carry 

AND memory with accumulator 
Branch on bit reset 
Branch on bit set 

Test memory bits with accumulator 



Branch relative always 

Compare memory with accumulator 

Decrement accumulator 

EXOR memory with accumulator 

Increment accumulator 

Jump 

Load accumulator with memory 

OR memory with accumulator 

Push X on stack 

Push Y on stack 

Pull Xfrom stack 

Pull Y from stack 

Reset memory bit 

Subtract memory from accumulator 
with borrow 
Set memory bit 
Store accumulator in memory 
Store zero 



Test and reset memory bits with 
accumulator 

Test and set memory bits with 
accumulator 



to supply voltage and, of course, better 
noise immunity. 

(3) CMOS, due to its lower power 
consumption and heat dissipation 
makes possible a more compact 
architecture, which, in turn, has 
allowed Rockwell to add more instruc- 
tions to the CPU. 

Using an R65C02 

Let's look at these extra instructions 
and various methods of utilising an 
R65C02 in an existing micro (Fig 1). 

Zero page indirect and indirect inde- 
xed by X are totally new addressing 
modes. In the zero page indirect mode, 
the second byte contains a zero page 
address containing the 16-bit address 
that gives the effective address. Indirect 
indexed by X takes the second and third 
bytes of the instruction and adds these 
to the X register to give the effective 
address. This is useful for implementa- 
tions of jump tables. 

The most significant digit will change 
in the opcode to give the bit being 
tested: that is, the opcode for SMB 2 is 
A7. 

Many 6502 programs will contain 
sequences such as: 

TXA 

PHA 

TYA 

PHA 

to save the index registers on the stack, 
or 

LDA $00 
ORA C$01 
STA $00 

to set a bit in a particular byte in zerc 
page. 

The above examples use four bytes 
and 10 clock cycles, and six bytes and 
eight clock cycles respectively. 

With the 65C02, however, these 
become: 

PHX 

PHY 

and 

SMB 0, $00 

These are equivalent program sequ- 
ences performing exactly the same 
function, but they do not destroy the 
accumulator. They also use only two 
bytes each and six and five clock cycles 
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respectively- Hence, on most opera- 
tio ns, savings of memory space and 
program execution time can be 

a chi eveC *' . . . , 

The mam problem, however, when 

writing software for this processor is 
that the new opcodes are not included 
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in the existing assembler! This can be 
solved by using .BYTE operands for all 
but the branch instructions, or, in the 
case of the BBC Micro, new functions 



The following table will tell you what 
typeofR65C02toobtainforthe relevant 
speeds: 

1MHz R65C02P1 



2MHz R65C02P2 
3MHz R65C02P3 
4MHz R65C02P4 

So, for a BBC Micro you will need an 
R65C02P2. 

1- and 2MHz versions are available 
now, and 3- and 4MHz versions will be 
available later this year. 

Rockwell distributor, RCS Microsy- 
stems has put together a pack for BBC 
Micro owners consisting of an 
R65C02P2, a listing of a program 
enabling the newopcodesto be used in 
the BBC assembler (Fig 2) and an 
R65C02 data sheet. 

The price is £17.25, incl VAT & p&p. 
Further information is available on (01 ) 
979 2204. EH 



1ST 

10 REM ADDING 65C02 OP -CODES TQ THF 
BBC ASSEMBLER 

20 REM PROGRAM BY BOB WATFORD' 

30 REM 

40 REM THE FIRST PART OF THE PROGRAM 
SHOWS HOW THE NEW OP -CODES 
ARE USED 

50 REM 

60 REM LINES BELOW 30000* MAY BE 

DELETED, AND REPLACED BY YOUR 
OWN CODE 

70 REM 

80 REM ZX SHOULD BE REPLACED BY THE 
VARIABLE USED FOR OPT' 

(eg. opt, PASS ETC) 

90 REM N 

100DTH CODEX Sr 100 
1 10TEST-L12: BGTEST-*ABCD 
120FORZX-4 TO 7 STEP 3 
1 iaOX-CODEX : PX-* 1 000 
140C 

130OPT Z 7. 

140OPT FNBRA ( ZX, LABEL 1 ) 

170OPT FNORA<ZX,TEST> 

180OPT FNAND(ZX,TEST) 

190OPT FNEOR ( ZX,TEST) 

200OPT FNADC ( ZX , TEST ) 

210OPT FNSTA(ZX,TEST> 

220OPT FNLDA ( ZX , TEST ) 

230OPT FNCMP ( ZX ,TEST) 

240OPT FNSBC ( ZX ,TEST) 

230. LABEL 1 OPT FNTSB (ZX, TEST) 

260OPT FNTRB ( ZX , TEST > 

270OPT FNBIT <ZX,TEST> 

280OPT FNSTZ ( ZX, TEST ) 

290OPT FN9TZX ( ZX,TEST) 

300OPT FNRMB ( ZX,0, TEST) 

310QPT FNRMB (ZX,1, TEST) 

320OPT FNRMB <ZX, 2, TEST) 

330OPT FNRMB < ZX ,3, TEST) 

340OPT FNRMB (ZX, 4, TEST) 

350OPT FNRMB (ZX, 5, TEST) 

360OPT FNRMB (ZX, 6, TEST) 

370OPT FNRMB < ZX,7, TEST) 

380OPT FNSMB ( ZX ,0, TEST) 

390OPT FNSMB (ZX,1, TEST) 

400OPT FNSMB (ZX, 2, TEST) 

410OPT FN9MB ( ZX , 3, TEST) 

420OPT FNSMB (ZX, 4, TEST) 

430OPT FNSMB (ZX, 3, TEST) 

440OPT FNSMB (ZX, 6, TEST) 

430OPT FNSMB (ZX, 7, TEST) 

460OP T FNBITI <Z7. ,*AA) 

470OP T FNINCA(ZX) 

480OPT FNDECA ( ZX) 

490OP1 FNPHY(ZX) 

300OP7 FNPLY(ZX) 

3 1 GOP 7 FNPHX(ZX) 

320OPT FNPLX(ZX) 

B30OP r FNTSB (ZX.BQTEST) 

340OPI FNTRB (ZX,BGTEST> 

550OPT FNBIT (ZX,B0TE9T) 

B60OP7 FlMJMP ( ZX, BGTEST) 

B70OPI FNSTZ (ZX, BGTEST) 

580OPT FNSTZ X<ZX, BGTEST) 

S90OPT FNBBN (ZX,0,TEST , L2) 

900. L2 OPT FNBBR (ZX, 1 ,TEST,L3) 

^»10.L3 OPT FNBBR (ZX, 2, TEST, L4) 

9?0.L4 OPT FNBBR (ZX, 3, TEST, L3> 

5>]0.L3 OPT FNBBR (ZX, 4, TEST ,L6) 

M«-L6 OPT FNBBR (ZX, 3, TEST, L7) 
o30.L7 OPT FNBBR (ZX, 6, TEST, L8) 

960. L0 OPT FNBBR (ZX, 7, TEST, L9) 

970. L9 OPT FNBBS(ZX,0,TEST,L10) 



680. LI0 OPT FNBBB(ZX,1, TEST, Lll) 
690. LI 1 OPT FNBB5 ( ZX , 2 , TEST , L 1 2 ) 
700.L12 OPT FNBBS(Z7.,3,TEST,L13> 
710. L13 OPT FNBB9(ZX,4,TEST,L14> 
720. L14 OPT FNBBS(ZX,3,TEST,L13> 
730.L15 OPT FNBBS(ZX,6,TEST ,L16) 
750] Ll6 ° PT FNBBS(Zy -»7fTEST,L9> 
760NEXT 

770 REM THIS IS THE END OF 
THE TEST PROGRAM 

30000REM START OF 65C02 FUNCTIONS 
30001 END 

30002DEFFNBRA (opt 7. , wher eX) 

30003COPT optXiBNE whereX: 3 
30004IFoptX>3 O7.?-2**80 ELSEP7.?-2=*80 
30085-optX 

30006 DEFFNBBS ( op tX , b i t X , address*/. , wher eX ) 
30007 COPT optX: BNE where7.: 3 
30008IFoptX>3 0*/.?-2-*8F+bi t7.*l 6: 07.70- (OX 
7-1 )-ltOX?-l»addresBX:OX=OX+l ELSEPX7-2- 
fcBF^bi tX*16: PX70- (P7.7-1 ) - l j PX?-l«=address 
X 

30B09PX-PXM 
3001 0-op tX 

300 1 1 DEFFNBBR ( op t X , b i t X , address*/. , wher eX > 

3001 2 COPT optXtBNE whereX: 3 

300 i 3 1 Fop t X >3 0X7- 2-S.BF +b i t X* 1 6 j 0X70= < OX 

7-1 ) -1 1 07.7-1 -address*/.: 0X-07.+ 1 ELSEP7.7-2- 

&0F+b i tX*16: PX70- ( PX7- 1 ) - 1 : PX7- 1 -addr ess 

X 

30014PX-PX+1 

3001 5-op tX 

300 1 6DEFFNPHY (optX ) 

3001 7C OPT optX: EQUB *5A: 3 
300 1 8-op 1 7. 

300 1 9DEFFNPLY (op tX) 

30020 COPT optXt EQUB *7A: 3 
30021 -OptX 
30022DEFFNPHX (optX) 

30023COPT optXt EQUB l«DAt 3 
30024— optX 
30023DEFFNPL X (optX) 

30026COPT optXi EQUB *FA:3 
30027— optX 

30028DEFFNRMB (optX , bi tX ,addressX) 

30029 COPT optX i EQUB bi tX*16+*07:EQUB add 
ressXt 3 
300 30- optX 

3003 1 DEFFNSMB (op tX , b i t X , address*/.) 

30032 COPT optX t EQUB bi tX*16+*87:EQUB add 
ressXt 3 
30033-optX 
30034DEFFN I NCA ( op t X ) 

30035COPT optXtECUB *1A:3 
30036-optX 

30037DEFFNDECA (optX) 

30038 COPT optXt EQUB 13At 3 
30039=»Op tX 



30040DEFFNTSB (optX , addressX) 

3004 1 IFaddressX>*FF COPT optXiEGUB &0C:E 
3UW address*/.} 3 ELSECOPT opt*/.: EQUB *04iEQ 
UB addrecsXt 3 
3004 2-op tV. 

30043DEFFNTRB (optX, addressX) 
30044IFaddressX>*FF COPT optX: EQUB &lCtE 
OUW address*/.: 3 ELSECOPT optXiEQUB *14iEQ 
UB addressXt 3 
30045=optX 

•30046DEFFNSTZ (optX , address*/.) 

30047 IFaddressX>*FF COPT optX: EQUB *9C:E 
QUW addressX: 3 ELSECOPT optXiEQUB *64: EQ 
UB addressX: 3 
30048-op tX 

30049DEFFNSTZX (opt*/., addressX) 
30050IFaddressX>*FF COPT opt*/.: EQUB *9E:E 
QUW addressX: 3 ELSECOPT optXiEQUB Sc74:EQ 
UB addresBX: 3 
3005 1 -opt X 

30052DEFFNORA (optX, addressX) 

30053 COPT optX: EQUB *12:EQUB addressX: 3 
30054=op t7. 

30055DEFFNAND ( opt*/. , addressX ) 

30056 COPT optXxEQUB *32:EQUB addressX: 3 
30057-op 1 7. 

30058DEFFNEOR (opt*/. , addressX) 

30059COPT optX: EQUB *52:EQUB addressX: 3 
30060=optX 

30061DEFFNADC (opt*/., addressX) 

30062 COPT optXiEQUB *72:EQUB addressX: 3 
30063-op 1 7. 

30064DEFFNSTA (optX , addressX) 

30065 COPT optXiEQUB &92:EQUB addressX: 3 
30066-optX 

30067DEFFNLDA ( opt 7. , ad dr esmX ) 

30068 COPT optX: EQUB *B2:EQUB addressX: 3 
30069=optX 

30070DEFFNCMP ( op t X , addressX ) 

30071 COPT optXiEQUB 8cD2:EDUB addressX: 3 
30072-op tX 

30073DEFFNSBC (optX,address7.) 

30074 COPT optX: EQUB *F2:EQU8 addressX: 3 
30075-op tX 

30076DEFFNJMP (optX , addressX) 

3007 7 COPT optXiEQUB *7C«EQUW addressX: 3 
30078-optX 

30079DEFFNB I T ( opt 7. , addressX > 

30080 1 Faddr es*V. >*FF COPT optXiEQUB *3C«E 
QUW addressX: 3 ELSECOPT opt7.:EQUB *34:EQ 
UB addressX: 3 
3008 l -optX 

300B2DEFFNBITI (optX,byteX) 

30083C OPT optXiEQUB *89: EQUB byteXi 3 
30084-op tX 



Fig 2 Program listing 
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Accumulator 
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FA 
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Description 

Add memory to accumulator with 
carry 

AND memory with accumulator 
Branch on bit reset 
Branch on bit set 

Test memory bits with accumulator 

Branch relative always 

Compare memory with accumulator 

Decrement accumulator 

EXOR memory with accumulator 

Increment accumulator 

Jump 

Load accumulator with memory 

OR memory with accumulator 

Push X on stack 

Push V on stack 

Pull X from stack 

Pull Y from stack 

Reset memory bit 

Subtract memory from accumulator 
with borrow 
Set memory bit 
Store accumulator in memory 
Store zero 



Test and reset memory bits with 
accumulator 

Test and set memory bits with 
accumulator 
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l« R£ BBC ASSEMBLER U ™ E 
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j* ^ THE FIRST PART of the program 
48 R 01 SHOWS HOW THE NEW OP-CQDES 
ARE USED ° ES 

50 pph lines below 30aaer may be 

** R DELETED, AND REPLACED BY YOUR 
OWN CODE YOUR 



ZX 

FNBRA ( ZX , LABEL 1 ) 
Ff<K)RA ( ZX , TEST) 
p N AND<ZX, TEST) 
fneor<zx,test> 
FNADC < Z X , TEST ) 
FNSTA<ZX,TEST> 

fnlda<zx,test> 



rEM z% should be replaced by 
fl® variable used for opt- 

(e8 . opt, PASS ^TC> 

l^CODEX MSB 
l«®!*g T ,8, 1 2 1 BGTEBT»I,ABCD 
‘iScnRlX-* TO 7 STEP 3 

}^0%-C ODEXiPX-1.1000 

148C 

lS£I 

!480PT 
17B0P t 

iseoPT 

19B0PT 

2880PT 
2180PT 

;St T FNCMP(ZX,TEST> 

;a0OPT FNS8C(ZX,TEST) 

Lg labeli opt FNTSB(ZX,TEST) 
?^opt fntrb(ZX,test> 

« 70O PT FNBIT <ZX, TEST) 

ZgaOPT FNSTZ ( ZX , TEST ) 

2900PT FNSTZX(ZX,TEST> 
j^OPT FNRMB (ZX,0, TEST) 

310OPT FNRMB ( ZX, 1 , TEST) 

32 0OPT FNRMB(ZX,2,TEST) 

330OPT FNRMB < ZX , 3 , TEST ) 

340OPT FNRMB (ZX, 4, TEST) 

35K)PT FNRMB <ZX, 3, TEST) 

360OPI FNRMB (ZX, 6, TEST) 

370OPT FNRMB (ZX, 7, TEST) 

380OPT FNSMB ( ZX , 0 , TEST ) 

390OPT FNSMB<ZX,1,TEST) 

400CPT FNSMB ( ZX , 2, TEST ) 

410OPT FNSMB (ZX, 3, TEST) 

420CPT FNSMB ( ZX , 4 ( TEST ) 

♦3BOPT FNSMB <ZX, 3, TEST) 

440CPT FNSMB (ZX, 6, TEST) 

450OPT FNSMB ( ZX , 7 , TEST ) 

4£00P t FNBITI <ZX,fcAA) 

470OPT FNINCA(ZX) 

48&OPT FNDECA < ZX) 

490OPT FNPWY(ZX) 

500QPT FNPLY(ZX) 

31B0PT FNFHX(ZX) 

32&OPT FNPLX(ZX) 

33»OPT FNTSB (ZX, BGTEST) 

540CPT FnTRB ( ZX , BGTE9T ) 

53BOPT ^NB1T(ZX,B0TE8T) 

36B0PT FNJMP ( ZX, BGTEST) 

37B0PT FNS^ Z CZ7. , BGTEST ) 

580OPT FNSTZ x <ZX, BGTEST) 

'90OPT FNBBR < ZX , 0 , TEST ,L2 > 

6M.L2 OPT f HBbf< ( ZX, I , TEST ,L3> 
>10. L3 OPT FNB8R(ZX,2,TEST,L4) 
SJ0.L4 OPT FNB&P ( ZX, 3 , TEST ,L3) 
>X0.L3 OPT FNBBA<ZX,4,TEST,L6> 
M.L6 OPT FNBBR < ZX , 3, TEST , L 7 ) 
oM.L7 DPT F NBBft ( ZX ,6 , TEST ,L6) 
460. LB OPT FNBBR (ZX, 7, TEST, L9> 
67B.L9 OPT FNBBS<ZX,0,TEST,L10> 



the 



6m.ui an S (n ' 1 ’ TEST - L “) 

700 Zr p^ S<ZX < 2 » T EST,L12) 

Zia.LlS 0°^ p^ <r/ -’ 3 ’ TEST .L13) 
720!l14 TEST, LI 4) 

730. L15 Qp-r CMoff <ZX » S .TEST,L13) 

740 L 6 WT Pmesoo ^ 77. ,6 , TEST , L 1&> 
7503 RNBBS(Z7,7,TEST ,L9) 

760NEXT 

770 REM THIS IS THE END OF 

300 S*" Functions 

^DEFFNBRAIoRtX.Mh^eX, 

?-l ) -i . OX ? -2«8(QF«H3itX*16i O7,?0* <Q-/. 

30009PX-PX+ 1 
300i0*optX 

_ _1 1 * u/ « 7 “l “address’/. !07.«07,+ i ELSEPX^-2- 

L0F+b , 1 7.* 1 6 1 P7.?0= <P7.?- 1 > - 1 . P -/.?_ ! =addr ess 

30014R7.-PX+1 

3001 5-op tX 

300 1 6DEFFNPHY (optX) 

300 1 7 COPT optXiEQUB t<SA: 3 

300lB*optX 

300 1 9DEFFNPLY (optX) 

30020 COPT optX* EQUB &7A* J 
30021 -optX 
30022DEFFNPHX (optX) 

3B023COPT optX* EQUB fcDA: 3 
30024-opt X 
30023DEFFNPLX (optX) 

30026COPT optX* EQUB &FA: 3 
30027-optX 

30020DEFFNRMB (optX,bi tX, addressX) 
30029COPT optX * EQUB bi tX*l6«-fc07* EQUB Add 

rttftXi ] 

300 30- optX 

30031 0EFFN6MB (optX,bi tX, addr essX) 
30032COPT optX* EQUB bi tX*16+&87iEQUB add 
rtttXi 3 
30033-op tX 
30034OEFFN I NCA ( opt X ) 

30033C OPT optX* EQUB tlA :3 
30036 -optX 
30037OEFFNDECA (optX) 

300 38 C OPT optX* EQUB l«3Ai 3 
30039-optX 



30040DEFFNTSB (optX, addra«»X) 

3004 i I FaddressX >fcFF COPT opt X* EQUB &0CtE 
QUW addressX* 3 ELSECOPT optXxEQUB fc04*EQ 
UB addressX: 3 
3004 2 -optX 

30043DEFFNTRB (optX , addr esaX) 
30044IFaddre*sX>8cFF COPT optX: EQUB &1C:E 
QUW addressX: 3 ELSECOPT optXtEQUB S<14:EQ 
UB addressX: 3 
30045=op tX 

30046DEFFNSTZ (optX , addressX) 
30047IFaddres*X>$<FF COPT optXiEQUB &9C:E 
QUW addressX* 3 ELSECOPT optX* EQUB &64:EQ 
UB addressX: 3 
30048-optX 

30049DEFFNSTZ X < optX , addressX ) 

30050 1 Faddr essX >t*FF COPT optX* EQUB 5(9E*E 
QUW addressX; 3 ELSECOPT optX: EQUB &74:EQ 
UB addressX: 3 
30051 -optX 

30052DEFFNORA < op t X , addr essX > 

30053 COPT optX: EQUB &I2:EQUB address'/.* 3 
30054—optX 

30055DEFFNAND < optX , addressX ) 

30056 COPT optX: EQUB &32:EQUB addressX* 3 
30057- optX 

30058DEFFNEOR ( op tX , addr essX ) 

30059 COPT optX: EQUB *52:EQUB addressX: 3 
30060-op tX 

3006 1 DEF FNADC < op t X , addr essX ) 

30062 COPT optX: EQUB *c72sEQUB addressX* 3 
30063-op tX 

30064DEFFNSTA (optX , addressX) 

30065 COPT optX: EQUB &92:EQUB addressX* 3 
30066-op tX 

30067DEFFNLDA (optX , addr essX) 

30068 COPT optX: EQUB &B2:£QUB addressX: 3 
30069— optX. 

30070DEFFNCMP<optX, addressX) 

3007 1C OPT optX: EQUB &D2:EQUB addressX* 3 
30072— optX 

30073DEFFNSBC (optX , addressX) 

30074 COPT optX: EQUB 8<F2:EOUB addressX: 3 
30075-op tX 

30076DEFFNJMP (optX , addressX) 

3007 7 COPT optX: EQUB *7C:EQUW addressX* 3 
30078-optX 

30079DEFFNB I T < optX , addressX) 

30080 1 F addressX >&FF COPT optX: EQUB S«3CsE 
QUW addressX: 3 ELSECOPT optXiEQUB Sc34«EQ 
UB addressX: 3 
30081 -optX 

300B2DEFFNB I T I <optX,byteX> 

30083 COPT optX: EQUB 8<89:EQUB byteX* 3 
30084-optX - 



Fig 2 Program listing 



